00100	PRECEDE;				< Preliminary things
00200	FUNC EXAMP.FUN[INS,MUS];		< Get functions from EXAMP.FUN[INS,MUS]
00300	COMMON TOOT,CLAR;
00400	*
00500	
00600	REVRB 0 0 1;				< One "note" only
00700	 P2 12;					< should be at least 2-3" longer than
00800	END;					<   total of all instruments
00900	
01000	TOOT 0 1;
01100	P2 RHY/16;			< quarter note, 2 eighths, half
01200	P3 NOT/GS4/A/B/C5;			< G4 = G above middle C
01300	P4 1;					< maximum amplitude
01400	P5 F1;					< amplitude function
01500	P6 F6;					< waveform ("SYNTH") function
01600	P7 .05;					< percentage (0 ↔ 1) of reverberation
01700	END;
01800	CLAR;
01900	DUPL 2;
02000	P3 LIT/"P3*1.5"/"P3*1.7"/"P3*1.9";
02100	END;
02200	 CLAR 3 4;
02300	 P3 "FS/2";END;
02400	TEMPO/4 40 120/2 120/4 120 40;